Precision Software Appli…tions Silver Collection 1/Precision Software Applications Silver Collection Volume One (PSM) (1993).iso/tutor/clipper.exe/DEMODULE.PRG

Text File | 1985-08-03 | 2KB | 54 lines

* DEMODULE.FMT
CLEAR
SET COLOR TO r/w
@ 1,0 SAY  " Structure of Demonstration suite  "
@ 2,0 say  " ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~  "
@ 3,0 say  " of the CLIPPER dBASE III Compiler "
Set color to r*/w
@ 4,0 say  "  HIT ANY KEY FOR PREVIOUS MENU    "
SET COLOR TO G+/
@ 1,37 SAY  "╔════════╗"
@ 2,37 SAY  "║  DEMO  ║________┌──────┐"
@ 3,37 SAY  "╚════════╝        │ HELP │"
@ 4,41 SAY  "|             └──────┘"
@ 5,5 SAY   "_______________________________________________________"
@ 5,60 SAY  "______________"
@ 6,5 SAY   "|    |    |      |     |     |     |     |    |    |"
@ 6,62 SAY  "|          |"
@ 7,2 SAY   "┌──────┐|┌────────┐ | ┌───────┐ | ┌───────┐ | ┌─────┐ |"
@ 7,58 SAY  "┌───────┐   ┌──────┐"
@ 8,2 SAY   "│DESKIP│|│DEAPPEND│ | │DECRVAR│ | │RELATE2│ | │DEFIB│ |"
@ 8,58 SAY  "│DEINDEX│   │DELOOP│"
@ 9,2 SAY   "└──────┘|└────────┘ | └───────┘ | └───────┘ | └─────┘ |"
@ 9,58 SAY  "└───────┘   └──────┘"
@ 10,6 SAY  "╔══════╗    ┌──────┐                ┌─────┐   ╔════════"
@ 10,61 SAY "╗"
@ 11,6 SAY  "║DEFEAT║    │DEMOVE│                │DERUN│   ║CLIPMENU"
@ 11,61 SAY "║"
@ 12,6 SAY  "╚══════╝    └──────┘                └─────┘   ╚════════"
@ 12,61 SAY "╝"
@ 13,3 SAY  "_______|                                             |"
@ 14,3 SAY  "|                                                    |"
@ 15,3 SAY  "|                                  ____________________"
@ 15,58 SAY "________________"
@ 16,3 SAY  "|                                  |         |        |"
@ 16,66 SAY "|      |"
@ 17,3 SAY  "|                               ╔═══════╗    |  ┌──────"
@ 17,58 SAY "───┐    |  ┌───────┐"
@ 18,3 SAY  "|                               ║CLIPNDX║    |  │CLIPWA"
@ 18,58 SAY "GE │    |  │CLIPAPP│"
@ 19,3 SAY  "|                               ╚═══════╝    |  └──────"
@ 19,58 SAY "───┘    |  └───────┘"
@ 20,3 SAY  "|__________________________         |        |"
@ 20,66 SAY "|"
@ 21,3 SAY  "|        |        |       |    ┌────────┐ ┌────────┐"
@ 21,62 SAY "┌────────┐"
@ 22,0 SAY  "┌─────┐ ┌──────┐ ┌──────┐ ┌──────┐│CLIPVIEW│ │CLIPEDIT│"
@ 22,62 SAY "│CLIPSRCH│"
@ 23,0 SAY  "│INKEY│ │KEYHIT│ │DEMOVE│ │REPLIC│└────────┘ └────────┘"
@ 23,62 SAY "└────────┘"
@ 24,0 SAY  "└─────┘ └──────┘ └──────┘ └──────┘"
@ 23,78
wait ""
set color to w/,
return